home *** CD-ROM | disk | FTP | other *** search
/ Mac-Source 1994 July / Mac-Source_July_1994.iso / C and C++ / Text⁄Files / Writeswell Jr. 1.0.2 Master / WSI Library Source / OutlineButton.c < prev    next >
Text File  |  1992-09-14  |  1KB  |  40 lines

  1. /* OutlineButton.c
  2.  * Draw default outline around buttons.  Very handy library utility.
  3.  * ©1992 Working Software, Inc.
  4.  * This source code is copyrighted.  Permission is granted to use the Word Services
  5.  * portion of the Writeswell Jr. source code in your own programs, but you 
  6.  * may not distribute the Writeswell Jr. word-processor code as a 
  7.  * commercial product.  If you modify the code, please do not call it 
  8.  * Writeswell Jr. (or Writeswell.)  This will ensure that people understand the 
  9.  * program and don’t have to deal with a number of different versions with 
  10.  * who-knows-what going on in the code.
  11.  * 
  12.  * Writeswell Jr. and Writeswell are trademarks of Working Software, Inc.
  13.  *
  14.  * 19 May 92 Mike Crawford
  15.  */
  16.  
  17. #include "OutlineButton.h"
  18.  
  19. pascal void OutlineButton( DialogPtr dPtr, short item )
  20. {
  21.     Handle    itemH;
  22.     Rect    r;
  23.     short    kind;
  24.     PenState    pS;
  25.  
  26.     /* Outline a button to indicate that it is the default */
  27.  
  28.     GetPenState( &pS );
  29.     PenNormal();
  30.     PenSize( 3, 3 );
  31.     
  32.     GetDItem( dPtr, item, &kind, &itemH, &r );
  33.  
  34.     FrameRoundRect( &r, 16, 16 );
  35.  
  36.     SetPenState( &pS );
  37.  
  38.     return;
  39. }
  40.